Verteidigung-Masterarbeit

Empirische Studie zum Wirkungsgrad:
Ein Vergleich zwischen sitzendem und stehendem Fahren auf dem Fahrradergometer

Verfasser:
Johannes Joachim Richard Will

Betreuerin:
Dr. Martina Clauß

Gutachterinnen:
Dr. Martina Clauß
Dr. Anna Katharina Dunst

Datum:
11.02.2025

Inhalt

  1. MA als Webseite
  1. Hinleitung zum Thema
2.1. Welche literaturbasierte Theorie liegt vor und welche Probleme bzw. bisher nicht geklärte Zusammenhänge sind daraus ableitbar?
2.2. Daraus ergaben sich dann theoriebezogene Fragestellungen.
2.3. Wie wurde versucht, diese grundlegende mathematisch/physikalisch/chemisch/statistisch Fragestellungen zu beantworten?
  1. Theoretische Hintergrund
3.2. Mechanische und Innere Arbeit
  1. Methodik & Statistik
  1. Ergebnisse
  1. Diskussion & Limitationen

Link: Website

Umsetzung der Arbeit als Webseite

  • Verwendung der Open-Source-Programmiersprache R und Quarto
  • Ermöglicht die Erstellung von Dokumenten, Präsentationen, Büchern oder Webseiten
  • Unterstützung mehrerer Programmiersprachen (R, Python, Julia…)
  • Mithilfe von GitHub eine öffentlich zugängliche Webseite erstellt

Möglichkeiten der Web-basierten Masterarbeit

  • Integration und Ausführung von Code-Segmenten direkt in der Arbeit
  • Erweiterte Möglichkeiten der Datenvisualisierung
# Beispiel-Abbildung erstellen
ggplot(df_spiro_beispiel, aes(x = t_s)) +
  geom_line(aes(y = `V'O2`), color = "#1CADE4", size = 1) +
  geom_line(aes(y = `V'CO2`), color = "#EF5350", size = 1) +
  scale_x_continuous(limits = c(0, max(df_spiro_beispiel$t_s)),breaks = seq(0, max(df_spiro_beispiel$t_s), 100), 
                     expand = c(0, 0)) +
  scale_y_continuous(limits = c(0, 5),breaks = seq(0, 5, 1.0), labels = function(x) sprintf("%.1f", x)) +
  labs(x = "Zeit [s]", y = "V̇O₂ & V̇CO₂ [l · min⁻¹]") +
  theme_minimal()

Möglichkeiten der Web-basierten Masterarbeit

  • Effiziente Verarbeitung und Einbindung großer Datensätze
# Excel-Datensatz laden und darstellen
Stichprobe_df <- read_excel("Probanden_Daten 2.2.xlsm", sheet = "Stichprobe_final", range = "A1:Y10") %>%
  mutate(across(everything(), ~gsub(",", ".", .))) %>%
  mutate(across(-2, as.numeric)) %>%
  mutate(across(c(8, 10, 13, 15, 17, 19, 21, 23), ~round(., 2)))
datatable(Stichprobe_df, options = list(scrollX = TRUE, scrollY = "240px", dom = 't', order = list(list(0, 'asc')), 
                                        initComplete = JS("function(settings, json) {$(this.api().table().container()).css({'font-size': '70%'});}")), rownames = FALSE)

Möglichkeiten der Web-basierten Masterarbeit

  • Einbindung interaktiver Anwendungen (Shiny-Apps)
  • Transparente Darstellung des Quellcodes und der verwendeten Datensätze


Sehr hohe Reproduzierbarkeit der Analysen und der Ergebnisse

Link: Website/Anaerobe-alaktazide Energiebereitstellung

Energieanteile

Aerobe Energiekomponente

WAerob

Anaerobe-laktazide Energiekomponente

WBLC

Anaerobe-alaktazide Energiekomponente

WPCr

Energieanteile

  • asdf
  • …
  • …

WAerob

WBLC

WPCr

Link zur Webseite

Links zur Seite

Hauptseite

Innere Arbeit

Anaerobe-alaktazide Energiekomponente (WPCr)

EPOC: Shiny-App

Innere Arbeit

  • test 1
  • test 2

Innere Arbeit

  • test 2
  • test 2

Innere Arbeit - nach Winter(1979)

Link: Website/Innere Arbeit - Winter (1979)

EPot

EKin,trans

EKin,rot

EKin,gesamt

EGesamt

ΔEGesamt

PInt

Link: Website